home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus Special 13 / AMIGAplus Sonderheft 13 (1998)(ICP)(DE)[!].iso / rexx / milespergallon.scrx < prev    next >
Text File  |  1997-11-01  |  430b  |  20 lines
  1. /*        SciCalc Scientific Calculator
  2.         by Brian Savage copyright 1997
  3.         
  4.         Arexx script to calculate miles per gallon when given
  5.         distances in kilometres and fuel quantity in litres.
  6.  
  7. */
  8.  
  9. options results
  10.  
  11. getval
  12.  
  13. parse var result km            /* km ->kilometres from displayed value  */
  14.  
  15. getreg 1
  16.  
  17. parse var result litres        /* litres -> from register #1            */
  18.  
  19. putval km/1.62/(litres/4.54) /* mpg returned as displayed value      */
  20.